﻿Public Class PagingBarControl
    Inherits System.Web.UI.UserControl

    Private nTotalPage As Integer = 0
    Public Property TotalPage() As Integer
        Get
            Return nTotalPage
        End Get
        Set(ByVal value As Integer)
            nTotalPage = value
        End Set
    End Property

    Private nCurrentPage As Integer = 0
    Public Property CurrentPage() As Integer
        Get
            Return nCurrentPage
        End Get
        Set(ByVal value As Integer)
            nCurrentPage = value
        End Set
    End Property

    Private xUrl As String
    Public Property Url() As String
        Get
            Return xUrl
        End Get
        Set(ByVal value As String)
            xUrl = value
            If value(value.Length - 1) <> "/" Then
                xUrl = xUrl & "/"
            End If
        End Set
    End Property


    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

End Class